home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2008 January / Cybermycha 1_2008.iso / Data.cab / _83A504222AA040F3BEF8D354998AAC6F < prev    next >
Encoding:
Text File  |  2004-03-18  |  1.2 KB  |  33 lines
  1. regc(0, "TFACTOR")
  2. regc4f( 5, %daycolor_r, %daycolor_g, %daycolor_b, %sunvisibility )
  3. regc4f( 7, %ambient_r, %ambient_g, %ambient_b, %ambient_a )
  4. pshader("
  5.  
  6. ps_1_1
  7.  
  8. tex t0 ;texture (RGB - color, A<0-127> - Opacity, A<128-255> - Specular Mask)
  9. tex t1 ;Clouds
  10. tex t2 ;Terrain lightmap
  11. tex t3 ;Waterdeep
  12.  
  13. mul     r1.rgb, t0_bx2.a, c5.a                    ;Specular mask extraction
  14.  
  15. mul_sat     r1.rgb, v1,     r1           ;Specular * Specular Mask           = Masked Specular
  16. +mul        r1.a,   t2.a,   1-t1.a              ;Terrain lightmap * Clouds Shadow   = Static Lighting
  17.  
  18. mul         r0.rgb, v0,     r1.a                ;Diffuse * Static Lighting          = Diffuse Lighting
  19. +mul        r1.a,   r1.b,   r1.a                ;Masked Specular * Static Lighting  = Set Specular
  20.  
  21. mad_sat     r0.rgb, r0,     c7, c7.a        ;Diffuse Lighting + Map Ambient     = Set Diffuse
  22. +mov_x2_sat r0.a,    t0.a                        ;Opacity mask extraction
  23.  
  24. mad_sat     r0.rgb, t0,     r0,     r1.a        ;Light Texture
  25. +mul        r0.a, r0.a, t3.a                ;waterdeep
  26.  
  27. mul         r0.rgb, r0, c5                      ;Day
  28. +mul        r0.a,   r0.a,   c0.a           ;Opacity Mask * Object blending
  29.  
  30. ")
  31.  
  32.  
  33.